home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2003 November / PCWK1103B.iso / PCWK-txt / Antyspam / Spam Buster 1.95 / spambuster195.exe / %MAINDIR% / spamBuster.exe / 0 / RCDATA / TFRMFILESEARCH / TFRMFILESEARCH.txt
Encoding:
Text File  |  2002-03-14  |  3.3 KB  |  155 lines
  1. object frmFileSearch: TfrmFileSearch
  2.   Left = 316
  3.   Top = 163
  4.   Width = 439
  5.   Height = 259
  6.   Caption = 'File Search'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Position = poScreenCenter
  13.   OnClose = FormClose
  14.   OnCreate = FormCreate
  15.   OnShow = FormShow
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object ListBox: TListBox
  19.     Left = 0
  20.     Top = 97
  21.     Width = 431
  22.     Height = 116
  23.     Align = alClient
  24.     ItemHeight = 13
  25.     TabOrder = 0
  26.     OnDblClick = ListBoxDblClick
  27.   end
  28.   object StatusBar1: TStatusBar
  29.     Left = 0
  30.     Top = 213
  31.     Width = 431
  32.     Height = 19
  33.     Panels = <>
  34.     SimplePanel = True
  35.   end
  36.   object Panel1: TPanel
  37.     Left = 0
  38.     Top = 0
  39.     Width = 431
  40.     Height = 97
  41.     Align = alTop
  42.     TabOrder = 2
  43.     object EsLabel1: TRzLabel
  44.       Left = 62
  45.       Top = 6
  46.       Width = 129
  47.       Height = 31
  48.       Caption = 'File Search:'
  49.       Font.Charset = DEFAULT_CHARSET
  50.       Font.Color = clNavy
  51.       Font.Height = -27
  52.       Font.Name = 'Times New Roman'
  53.       Font.Style = []
  54.       ParentFont = False
  55.       BevelWidth = 0
  56.       FrameSides = []
  57.       LightTextStyle = True
  58.       TextStyle = tsRaised
  59.     end
  60.     object lblFileName: TRzLabel
  61.       Left = 198
  62.       Top = 6
  63.       Width = 123
  64.       Height = 31
  65.       Cursor = crHandPoint
  66.       Caption = 'lwprint.exe'
  67.       Font.Charset = DEFAULT_CHARSET
  68.       Font.Color = clRed
  69.       Font.Height = -27
  70.       Font.Name = 'Times New Roman'
  71.       Font.Style = []
  72.       ParentFont = False
  73.       OnClick = lblFileNameClick
  74.       BevelWidth = 0
  75.       FrameSides = []
  76.       FlyByColor = clLime
  77.       FlyByEnabled = True
  78.       TextStyle = tsRaised
  79.     end
  80.     object Animate1: TAnimate
  81.       Left = 5
  82.       Top = 6
  83.       Width = 48
  84.       Height = 50
  85.       Active = False
  86.       CommonAVI = aviFindFile
  87.       StopFrame = 23
  88.     end
  89.     object btStart: TButton
  90.       Left = 192
  91.       Top = 64
  92.       Width = 81
  93.       Height = 25
  94.       Caption = '&Start search'
  95.       Default = True
  96.       TabOrder = 2
  97.       OnClick = btStartClick
  98.     end
  99.     object btCancel: TButton
  100.       Left = 280
  101.       Top = 64
  102.       Width = 66
  103.       Height = 25
  104.       Cancel = True
  105.       Caption = 'Cancel'
  106.       TabOrder = 3
  107.       OnClick = btCancelClick
  108.     end
  109.     object btClose: TButton
  110.       Left = 352
  111.       Top = 64
  112.       Width = 66
  113.       Height = 25
  114.       Cancel = True
  115.       Caption = '&Close'
  116.       ModalResult = 1
  117.       TabOrder = 4
  118.       OnClick = btCloseClick
  119.     end
  120.     object btSource: TButton
  121.       Left = 8
  122.       Top = 64
  123.       Width = 177
  124.       Height = 25
  125.       Caption = 'S&ource:  C:\'
  126.       TabOrder = 1
  127.       OnClick = btSourceClick
  128.     end
  129.   end
  130.   object Iterator: TFileIterator
  131.     Options = [fiPath, fiDetails, fiRecurseFolders]
  132.     RootFolder = 'C:\'
  133.     OnAddFile = IteratorAddFile
  134.     OnAddFileQuery = IteratorAddFileQuery
  135.     OnActivate = IteratorActivate
  136.     OnTerminate = IteratorTerminate
  137.     Left = 53
  138.     Top = 115
  139.   end
  140.   object dlgFolder2: TPTSysFolderDlg
  141.     Domain = csidlDesktop
  142.     Options = [fdoReturnOnlyFSDirs]
  143.     Title = 'Select starting drive/folder'
  144.     Left = 16
  145.     Top = 112
  146.   end
  147.   object dlgFolder: TBrowseDirectoryDlg
  148.     Title = 'Select starting drive/folder'
  149.     Caption = 'Select starting drive/folder'
  150.     ShowSelectionInStatus = False
  151.     Left = 88
  152.     Top = 120
  153.   end
  154. end
  155.